home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 24 / AACD 24.iso / AACD / System / ReqToolsLib / Source / reqtools / filereqalloc.c < prev    next >
Encoding:
C/C++ Source or Header  |  2001-07-02  |  8.3 KB  |  317 lines
  1. /**************************************************************
  2. *                                                             *
  3. *      File/Font/Screenmode requester                         *
  4. *                                                             *
  5. *                                 (c) Nico François 1991-1994 *
  6. **************************************************************/
  7.  
  8. #include "filereq.h"
  9.  
  10. /****************************************************************************************/
  11.  
  12. #ifdef _AROS
  13. #define fib_EntryType fib_DirEntryType
  14. #endif
  15.  
  16. /****************************************************************************************/
  17.  
  18. ULONG structsize[] =
  19. {
  20.     sizeof (struct RealFileRequester)         + sizeof(ULONG),    /* RT_FILEREQ */
  21.     sizeof (struct rtReqInfo)             + sizeof(ULONG),    /* RT_REQINFO */
  22.     sizeof (struct RealFontRequester)        + sizeof(ULONG),    /* RT_FONTREQ */
  23.     sizeof (struct RealScreenModeRequester)     + sizeof(ULONG),    /* RT_SCREENMODEREQ */
  24. };
  25.  
  26. /****************************************************************************************/
  27.  
  28. /********************
  29. * rtAllocRequestA() *
  30. ********************/
  31.  
  32. void REGARGS
  33. SetFileDirMode (struct BufferData *buff, ULONG flags)
  34. {
  35.     ULONG prefsflags;
  36.  
  37.     /* Check preferences if we have to display files or directories first */
  38.     prefsflags = rtLockPrefs()->Flags;
  39.     buff->dirsmixed = (prefsflags & RTPRF_DIRSMIXED);
  40.  
  41.     if (flags & FREQF_NOFILES)
  42.     {
  43.     prefsflags |= RTPRF_DIRSFIRST;
  44.     buff->dirsmixed = FALSE;
  45.     }
  46.  
  47.     if (prefsflags & RTPRF_DIRSFIRST)
  48.     {
  49.     buff->file_id = 1;
  50.     buff->directory_id = 0;
  51.     }
  52.     else
  53.     {
  54.     buff->file_id = 0;
  55.     buff->directory_id = 1;
  56.     }
  57.  
  58.     rtUnlockPrefs();
  59. }
  60.  
  61. /****************************************************************************************/
  62.  
  63. ASM struct BufferData *GetBufferDataPtr (OPT_REGPARAM(a1, APTR, req))
  64. {
  65.     switch (REQTYPE(req))
  66.     {
  67.     case RT_FILEREQ:
  68.         return (&((struct RealFileRequester *)req)->buff);
  69.         
  70.     case RT_FONTREQ:
  71.         return (&((struct RealFontRequester *)req)->buff);
  72.         
  73.     case RT_SCREENMODEREQ:
  74.         return (&((struct RealScreenModeRequester *)req)->buff);
  75.         
  76.     }
  77.     
  78.     return (NULL);
  79.     
  80. }
  81.  
  82. /****************************************************************************************/
  83.  
  84. APTR ASM SAVEDS AllocRequestA (
  85.     REGPARAM(d0, ULONG, type),
  86.     REGPARAM(a0, struct TagItem *,taglist))
  87. {
  88.     struct BufferData     *buff;
  89.     ULONG         *reqstruct;
  90.  
  91.     if (!(reqstruct = AllocVec (structsize[type], MEMF_PUBLIC | MEMF_CLEAR)))
  92.     return (NULL);
  93.     
  94.     *reqstruct++ = type;
  95.     
  96.     switch (type)
  97.     {
  98.     case RT_FILEREQ:
  99.         ((FI_REQ)reqstruct)->Dir = ((FI_REQ)reqstruct)->dirname;
  100.         ((FI_REQ)reqstruct)->MatchPat = ((FI_REQ)reqstruct)->patstr;
  101.         ((FI_REQ)reqstruct)->hideinfo = TRUE;
  102.         SetFileDirMode (&((FI_REQ)reqstruct)->buff, 0);
  103.         break;
  104.         
  105.     case RT_FONTREQ:
  106.         ((FO_REQ)reqstruct)->Attr = topaz80;
  107.         /* copy 'topaz.font' to name buffer and point name pointer there */
  108.         strcpy (((FO_REQ)reqstruct)->fontname, TOPAZSTR);
  109.         ((FO_REQ)reqstruct)->Attr.ta_Name = ((FO_REQ)reqstruct)->fontname;
  110.         break;
  111.         
  112.     case RT_SCREENMODEREQ:
  113.         ((SC_REQ)reqstruct)->DisplayID = INVALID_ID;
  114.         ((SC_REQ)reqstruct)->OverscanType = OSCAN_TEXT;
  115.         ((SC_REQ)reqstruct)->AutoScroll = TRUE;
  116.         break;
  117.         
  118.     }
  119.     
  120.     ((struct rtReqInfo *)reqstruct)->ReqPos = REQPOS_DEFAULT;
  121.  
  122.     buff = GetBufferDataPtr (reqstruct);    
  123.     if (buff && (DOSBase->dl_lib.lib_Version >= 39))
  124.     {
  125.     buff->pool = CreatePool (MEMF_PUBLIC | MEMF_CLEAR, 8192, 4096);
  126.     }
  127.     
  128.     return (reqstruct);
  129. }
  130.  
  131. /****************************************************************************************/
  132.  
  133. /********************
  134. * rtFreeReqBuffer() *
  135. ********************/
  136.  
  137. void ASM SAVEDS FreeReqBuffer (REGPARAM(a1, APTR, req))
  138. {
  139.     struct BufferData     *buff;
  140.     struct ReqEntry     *entry, *temp;
  141.  
  142.     if ((buff = GetBufferDataPtr (req)))
  143.     {
  144.     entry = buff->firstname;
  145.     while ((temp = entry))
  146.     {
  147.         entry = (struct ReqEntry *)entry->re_Next;
  148.         FreeVecPooled (buff->pool, temp);
  149.     }
  150.     buff->firstname = NULL;
  151.     }
  152. }
  153.  
  154.  
  155. /****************************************************************************************/
  156.  
  157. /******************
  158. * rtFreeRequest() *
  159. ******************/
  160.  
  161. void ASM SAVEDS FreeRequest (REGPARAM(a1, APTR, req))
  162. {
  163.     struct BufferData *buff;
  164.  
  165.     if (!req) return;
  166.     
  167.     FreeReqBuffer (req);
  168.     
  169.     if ((buff = GetBufferDataPtr (req)))
  170.     {
  171.     if (buff->pool) DeletePool (buff->pool);
  172.     }
  173.     
  174.     FreeVec ((APTR)(((IPTR)req) - sizeof(ULONG)));
  175. }
  176.  
  177. /****************************************************************************************/
  178.  
  179. /*********************
  180. * rtChangeReqAttrA() *
  181. *********************/
  182.  
  183. LONG ASM SAVEDS
  184. ChangeReqAttrA (REGPARAM(a1, APTR, req),
  185.                 REGPARAM(a0, struct TagItem *, taglist))
  186. {
  187.     UBYTE            fibspace[sizeof(struct FileInfoBlock)+4];
  188.     struct FileInfoBlock    *fib = (struct FileInfoBlock *)(((LONG)&fibspace[3] >> 2) << 2);
  189.     struct TagItem         *tag, *tstate = taglist;
  190.     struct RealFileRequester     *freq;
  191.     struct ReqEntry          *entry, *curr;
  192.     struct BufferData          *buff;
  193.     struct Screen         *scr;
  194.     IPTR             tagdata;
  195.  
  196.     /* parse tags */
  197.     while ((tag = NextTagItem ((const struct TagItem **)&tstate)))
  198.     {
  199.     tagdata = tag->ti_Data;
  200.     if (tag->ti_Tag > RT_TagBase)
  201.     {
  202.         switch (tag->ti_Tag)
  203.         {
  204.         case RTFI_Dir:
  205.             FreeReqBuffer (req);
  206.             strcpy (((struct RealFileRequester *)req)->dirname, (char *)tagdata);
  207.             break;
  208.             
  209.         case RTFI_MatchPat:
  210.             strcpy (((struct RealFileRequester *)req)->patstr, (char *)tagdata);
  211.             break;
  212.             
  213.         case RTFI_AddEntry:
  214.         case RTFI_RemoveEntry:
  215.             freq = (struct RealFileRequester *)req;
  216.             buff = &(freq->buff);
  217.             if (!buff->firstname) return (TRUE);
  218.             if (tag->ti_Tag == RTFI_AddEntry)
  219.             {
  220.             Examine ((BPTR)tagdata, fib);
  221.             return ((LONG)(AddEntry (NULL, buff, fib->fib_FileName, fib->fib_Size,
  222.                                     (fib->fib_EntryType > 0)
  223.                                     ? buff->directory_id : buff->file_id) != NULL));
  224.             }
  225.             else
  226.             {
  227.             entry = FindEntry (buff, (char *)tagdata, -1, -1, NULL, 0);
  228.             curr = (struct ReqEntry *)entry->re_Next;
  229.             if (!curr || Stricmp ((char *)tagdata, entry->re_Next->ln_Name))
  230.                 return( 0 );
  231.             entry->re_Next = curr->re_Next;
  232.             FreeVecPooled (buff->pool, curr);
  233.             }
  234.             break;
  235.             
  236.         case RTFO_FontName:
  237.             strcpy (((struct RealFontRequester *)req)->fontname, (char *)tagdata);
  238.             break;
  239.             
  240.         case RTFO_FontHeight:
  241.             ((struct RealFontRequester *)req)->Attr.ta_YSize = tagdata;
  242.             break;
  243.             
  244.         case RTFO_FontStyle:
  245.             ((struct RealFontRequester *)req)->Attr.ta_Style = tagdata;
  246.             break;
  247.             
  248.         case RTFO_FontFlags:
  249.             ((struct RealFontRequester *)req)->Attr.ta_Flags = tagdata;
  250.             break;
  251.             
  252.         case RTSC_ModeFromScreen:
  253.             scr = (struct Screen *)tagdata;
  254.             ((SC_REQ)req)->DisplayID = GetVPModeID (&scr->ViewPort);
  255.             ((SC_REQ)req)->DisplayWidth = scr->Width;
  256.             ((SC_REQ)req)->DisplayHeight = scr->Height;
  257.             ((SC_REQ)req)->DisplayDepth = scr->BitMap.Depth;
  258.             ((SC_REQ)req)->AutoScroll = (scr->Flags & AUTOSCROLL);
  259.             break;
  260.             
  261.         case RTSC_DisplayID:
  262.             ((SC_REQ)req)->DisplayID = tagdata & ~(0x00000440);
  263.             ((SC_REQ)req)->DisplayWidth = ((SC_REQ)req)->DisplayHeight
  264.             = ((SC_REQ)req)->DisplayDepth = 0xffff;
  265.             break;
  266.             
  267.         case RTSC_DisplayWidth:
  268.             ((SC_REQ)req)->DisplayWidth = tagdata;
  269.             break;
  270.             
  271.         case RTSC_DisplayHeight:
  272.             ((SC_REQ)req)->DisplayHeight = tagdata;
  273.             break;
  274.             
  275.         case RTSC_DisplayDepth:
  276.             ((SC_REQ)req)->DisplayDepth = tagdata;
  277.             break;
  278.             
  279.         case RTSC_OverscanType:
  280.             ((SC_REQ)req)->OverscanType = tagdata;
  281.             break;
  282.             
  283.         case RTSC_AutoScroll:
  284.             ((SC_REQ)req)->AutoScroll = tagdata;
  285.             break;
  286.             
  287.         } /* switch (tag->ti_Tag) */
  288.         
  289.     } /* if (tag->ti_Tag > RT_TagBase) */
  290.     
  291.     } /* while ((tag = NextTagItem ((const struct TagItem **)&tstate))) */
  292.  
  293. #warning There was a missing return. For AROS I added return 1!?
  294.  
  295.     return 1;    
  296. }
  297.  
  298. /****************************************************************************************/
  299.  
  300. /*******************
  301. * rtFreeFileList() *
  302. *******************/
  303.  
  304. void ASM SAVEDS FreeFileList (REGPARAM(a0, struct rtFileList *,selfile))
  305. {
  306.     struct rtFileList *last;
  307.  
  308.     while (selfile)
  309.     {
  310.     last = selfile;
  311.     selfile = selfile->Next;
  312.     FreeVec (last);
  313.     }
  314. }
  315.  
  316. /****************************************************************************************/
  317.